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FOREWORD 


This  report  represents  the  results  of  the  efforts  expended  in 
performance  of  Contract  F33615-69-C-L121,  "Development  of 
Stability  and  Control  Prediction  Methods  for  Stoppable  Rotor 
Aircraft.”  The  work  was  performed  by  Bell  Helicopter  Company 
under  Project  No.  8219.  It  was  sponsored  by  the  Air  Force 
Flight  Dynamics  Laboratory,  Air  Force  Systems  Command,  from 
December  1968  through  February  1970.  Mr.  Charles  L.  Livingston 
was  the  Bell  Helicopter  Company  Project  Engineer.  Mr.  Robert 
Nicholson  was  the  Air  Force  Project  Engineer. 

This  final  report  is  presented  in  four  volumes.  The  first 
describes  the  mathematical  model  and  the  methods  used  to 
calculate  stability  characteristics.  They  are  of  sufficient 
complexity  that  a  digital  computer  is  necessary  for  the  solu¬ 
tion  of  the  equations.  The  second  volume  presents  the  results 
of  sample  computations  and  discusses  input  and  output  formats 
and  good  user  techniques.  The  third  volume  describes  the 
computer  program  while  the  fourth  volume  contains  Appendices 
which  are  computer  generated  documentation  of  the  program. 

The  author  gratefully  acknowledges  the  assistance  of  Messrs. 

B.  L.  Blankenship  and  Tyce  McLarty  of  the  Bell  Helicopter 
Company  Aeromechanics  Group  and  Mr.  C.  L.  Livingston  of  the 
Stability  and  Control  Group  in  the  development  of  the  mathe¬ 
matical  model. 

This  technical  report  has  been  reviewed  and  is  approved. 


Chief,  Control  Criteria  Branch 
Flight  Control  Division 
Air  Force  Flight  Dynamics 
Laboratory 
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ABSTRACT 


This  report  describes  a  mathematical  model  of  rotorcraft  that 
may  be  used  to  determine  characteristics  of  performance,  sta¬ 
bility,  response,  and  rotor  blade  loads.  The  complexity  of 
the  equations  used  requires  the  use  of  a  digital  computer  for 
efficient  solution.  This  four  volume  report  describes  the 
computer  program  in  detail  and  illustrates  the  method  of  com¬ 
puting  rotorcraft  characteristics  by  specific  example. 

This  volume  contains  aids  for  the  computer  programmer.  The 
first  and  second  volumes  contain  a  discussion  of  the  mathemati¬ 
cal  model  and  detailed  instructions  for  the  users  of  the 
program.  The  fourth  volume  contains  computer  generated  docu¬ 
mentation  of  the  program. 

The  programming  aids  are  divided  into  two  groups:  background 
material  for  the  programmer  just  starting  to  work  on  this 
computer  program  and  the  detailed  explanation  of  the  computer 
generated  documentation  which  is  necessary  for  any  programmer 
to  work  effectively  on  this  program. 
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INTRODUCTION 


The  purpose  of  this  manual  is  to  provide  the  information 
required  to  modify  the  computer  program.  The  assumption  is 
made  that  the  reader  of  this  volume  will  have  first  read 
Volumes  I  and  II.  No  effort  was  made  to  make  this  volume 
self-contained  because  efficient  and  effective  programming  of 
ASAJOL  requires  knowing  how  to  use  the  program  and  knowing 
something  of  the  engineering  and  analysis  involved,  as  well 
as  a  knowledge  of  FORTRAN  programming  techniques. 

The  information  in  this  volume  is  of  two  types,  general  and 
specific.  The  general  information  is  discursive,  providing 
background  and  perspective.  The  detailed  information  is  that 
which  any  programmer  must  have  at  hand  when  making  additions 
or  modifications  and  when  debugging  these  additions  or  modifi¬ 
cations. 
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SECTION  II 

>  *  • 

GENERAL  PROGRAMMING  AIDS 


A.  MACRO  FLOW  CHARTS 

The  flow  charts  in  Figures  I  through  4  describe  the  functional 
structure  of  the  program  without  regard  to  flow  by  subroutine. 
Figure  I  shows  the  total  program  structure  and  is  a  composite 
of  Figures  I  through  10  in  Volume  II.  Figure  2  provides  some 
detail  of  the  trim  process  in  Figure  I.  Figures  3  and  4  simi¬ 
larly  amplify  the  stability  analysis  and  maneuver  functions, 
respectively,  in  Figure  1.  Information  which  is  normally  pre¬ 
sented  in  more  detailed  flow  charts  is,  for  the  most  part, 
provided  in  Table  I  and  Appendices  A  through  E,  Volume  IV. 

This  table  and  these  appendices  also  contain  vital  information 
which  is  not  found  in  detailed  flow  charts. 

B.  FORTRAN  SUBROUTINES 

The  FORTRAN  subroutines  contained  in  ASAJ01  are  listed  in 
alphabetical  order,  except  for  the  main  program,  C81,  which 
is  first.  A  few  remarks  are  made  for  each  subroutine  which 
indicates  its  general  purpose  or  use  in  the  general  structure 
of  the  program.  Great  detail  of  explanation  is  not  attempted 
here  since  it  would  be  redundant.  In  the  case  of  multiple 
entry  subroutines,  the  names  of  all  the  entries  will  be  given 
in  the  order  that  they  occur  in  the  subroutine.  The  first 
entry  has  the  same  name  as  the  control  section  which  appears 
in  Table  I. 

1.  G81.  This  routine  is  the  main  program  of  ASAJ01.  This 
subprogram  reads  the  control  cards  which  direct  the  flow 

of  the  whole  problem.  The  path  is  selected  and  calls  ini¬ 
tiated  to  begin  working  the  problem.  Upon  return,  possible 
errors  are  checked  for  and  appropriate  action  is  taken.  If 
an  error  is  detected,  an  error  message  may  be  printed  out. 

Then  the  program  either  terminates  execution  or  starts  the 
next  problem,  with  the  severity  of  the  error  determining  which. 

2.  AJACOB.  This  subroutine  handles  computation  of  quantities 
which  depend  upon  variables  which  are  changed  in  either  sub¬ 
routine  TRIM  or  subroutine  STAB,  which  are  used  in  the  calcula¬ 
tion  of  partial  derivatives.  These  quantities  are  then  calcu¬ 
lated  and  used  then  in  the  computation  of  forces  and  moments. 

3.  ANAL.  Output  of  this  subroutine  consists  of  forces  and 
moments  from  each  surface  or  mechanism  which  produces  either  a 
force  or  a  moment  and  the  total  summation  of  forces  and  moments. 
In  the  subroutine  itself  are  calculated  the  forces  and  moments 
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of  the  wing,  elevator,  f in j  and  fuselage  as  well  as  jet 
thrust.  The  first  subroutine  in  the  rotor  analysis  is  called 
and  returns  the  rotor  forces  and  moments. 

4.  GATS.  The  inputs  to  this  subroutine  are.  two  sets  of  Euler 
angles  and  a  direction  number  for  each  set.  The  output  is  a 
set  of  Euler  angles  which  are  related  to  the  two  sets  input. 

The  two  sets  input  are  the  Euler  angles  connecting  three  dif¬ 
ferent  coordinate  systems  X,  Y,  and  Z  with  set  one  connecting 
coordinate  systems  X  and  Y  and  set  two  connecting  coordinate 
systems  Y  and  Z.  The  output  set  of  Euler  angles  connect  co¬ 
ordinate  systems  X  and  Z.  It  is  possible  by  manipulation  of 
the  direction  numbers  in  the  input  and  the  order  in  which  they 
are  input  to  get  the  output  set  of  Euler  angles  to  be  in  either 
direction  desired. 

5.  CLOD.  The  inputs  to  this  subroutine  are  the  angle  of 
attack  and  Mach  number,  as  well  as  the  aerodynamic  description 
of  any  airfoil.  The  output  is  the  coefficient  of  lift  and  the 
coefficient  of  drag. 

6.  COM  SOL.  This  subroutine  solves  systems  of  linear  equations 
in  complex  variables. 

7.  CONI.  The  function  of  this  subroutine  is  to  take  the  input 
control  group  and  initialize  and  calculate  quantities  which 
are  then  used  in  the  computation  of  the  settings  of  the  swash- 
plate  from  the  control  position. 

8.  C0N2.  This  subroutine  has  a  similar  function  to  CONI  but 
is  more  specialized.  The  quantities  which  are  initialized  in 
this  subroutine  are  confined  to  control  phasing  and  secondary 
linking  of  the  controls. 

9.  CURVET.  This  subroutine  analyzes  the  time  history  of 
selected  variables  during  a  maneuver.  This  analysis  is  ac¬ 
complished  by  a  least  squares  curve  fit  followed  by  com¬ 
parison  of  both  the  amplitude  and  phase  angle  of  different 
variables.  Then  one  variable  is  expressed  as  a  linear  func¬ 
tion  of  two  others. 

10.  C81L.  The  function  of  this  subroutine  is  the  transfer  to 
a  disk  of  maneuver  time  history  data  which  has  been  stored  on 
a  tape  or  the  transfer  to  a  tape  of  maneuver  time  history  data 
which  has  been  stored  on  a  disk. 

11.  DAMPER.  This  is  the  variable  damper  for  TRIM.  The  pur¬ 
pose  of  this  is  to  gradually  dampen  out  oscillations  of  the 
trim  iterations.  This  is  accomplished  by  checking  the  errors 
generated  in  TRIM  against  an  upper  limit  and,  whenever  all 
errors  are  less  than  this  limit,  reducing  both  the  partial 
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derivative  increment  and  the  maximum  amount  which  one  of  the 
TRIM  variables  can  change  in  one  iteration. 

12.  DAT.  This  is  a  block  data  subroutine  which  contains  the 
alphameric  data  for  subroutine  PARA  and  the  alphameric  data 
for  subroutines  PPLOT  and  CURVET. 

13.  DAT1 .  This  is  a  second  block  data  subroutine  which  con¬ 
tain  s” primarily  Cl  and  Cq  tables  for  the  rotors.  Other 
secondary  data  tables  are  included  but  they  are  of  minor  im¬ 
portance. 

14.  PET.  In  this  subroutine  is  calculated  the  value  of  the 
determinant  during  the  extraction  of  eigenvalues  for  a  sta¬ 
bility  analysis. 

15.  DISK.  This  prints  out  the  gust  velocity  distribution 
over  the  rotor  disk  during  a  maneuver.  No  printout  is  made 
if  the  velocity  is  uniform  over  all  of  the  rotor  disk  or  if 
none  of  the  velocities  are  greater  than  .5  ft/sec. 

16.  DOGS.  The  inputs  to  this  subroutine  are  two  vectors. 

The  output  is  the  cross  product. 

17.  DOROT.  This  subroutine  is  the  one  which  performs  the 
integration  out  the  blade  and  around  the  azimuth  during  the 
rotor  analysis.  During  a  maneuver  this  integration  around 
the  azimuth  is  simply  a  summation  of  the  quantities  produced 
for  each  blade.  During  trim  it  is,  however,  a  true  integra¬ 
tion  quasi-statically  around  the  entire  azimuth. 

18.  ELEC.  This  subroutine  calculates  time  constants,  damping 
factors,  and  gains  during  a  stability  analysis. 

19.  GUST.  This  subroutine  is  entered  only  during  a  maneuver 
in  which  a  gust  is  being  generated.  It  calculates  the  distance 
of  each  part  of  the  rotorcraft  from  the  start  of  the  gust  and 
then  calculates  from  that  distance  the  magnitude  of  the  gust 
velocity  at  each  point  on  the  ship. 

20.  INIT.  Output  is  the  sole  function  of  this  subroutine. 

It  prints  out  the  full  page  of  the  maneuver  time  history  data. 
It  also  writes  out  on  disk  the  same  variables. 

21.  INRO.  The  function  of  this  subroutine  is  the  initializa¬ 
tion  and  calculation  of  problem  constants  from  the  rotor  in¬ 
puts  only. 

22.  I TRIM.  Included  in  this  subroutine  is  the  iteration  loop 
of  the  trim  section  of  the  program.  The  function  here  is  to 
iterate  to  a  s table-flight  condition. 
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23.  ITROT.  This  subroutine  initializes  variables  for  sub¬ 
routine  DOROT  and,  when  specified  by  the  input  parameters, 
activates  the  iteration  loops  to  balance  the  rotor  flapping 
moments. 

24.  I VAR.  This  subroutine  handles  the  initialization  of  the 
maneuver  inputs  for  subroutine  VARI. 

25.  JACOBI .  As  the  name  of  this  subroutine  implies,  its 
function  Is  to  calculate  the  Jacobian  for  use  in  the  Newton- 
Raphson  iteration  method  in  TRIM  or  for  calculating  the  dis¬ 
placement  derivatives  for  use  in  the  stability  analysis. 

26.  LAMODE.  This  subroutine  calculates  the  characteristic 
coefficient  matrix  for  the  lateral  mode  of  the  stability 
analysis. 

27.  LMODE.  This  subroutine  calculates  the  characteristic 
coefficient  matrix  for  the  longitudinal  mode  of  the  stability 
analysis. 

28.  MANU.  This  subroutine  controls  the  time  variant  maneuver 
segment.  It  handles  the  integration  of  the  differential  equa¬ 
tions  and  the  calling  of  the  o^her  subroutines  necessary  to  a 
maneuver. 

29.  MATRIX.  The  function  of  this  subroutine  is  to  calculate 
the  transformation  matrix  from  a  set  of  input  Euler  angles  and 
return  the  proper  matrix  to  either  subroutine  CATS  or  sub¬ 
routine  RATS. 

30.  MICE.  This  subroutine  is  a  two  dimensional  version  of 
subroutine  RATS  which  rotates  a  vector  with  two  components 
through  an  angle. 

31.  MNEM.  The  function  of  this  subroutine  is  to  calculate 
problem  constants  from  input  data  and  to  initialize  for  a 
problem. 

32.  MODE.  This  subroutine  controls  the  section  for  calcula¬ 
ting  the  response  of  a  rotorcraft  to  a  given  control  input 
during  the  stability  analysis. 

33.  NDSLOT.  The  input  to  this  subroutine  is  the  dimen - 
s^’onalized  characteristic  coefficient  matrix  in  the  stability 
analysis.  The  output  is  the  nondimens ional  characteristic 
coefficient  matrix. 

34.  NOPSIO,  N0PSI1.  The  inputs  to  this  subroutine  are  the 
number  of  azimuth  stations  for  use  in  the  rotor  analysis.  The 
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outputs  are  quantities  which  are  a  function  of  the  number  of 
azimuth  stations. 

35.  OFFTRM.  The  outputs  of  this  subroutine  are  the  values  to 
which  the  forces  and  moments  on  the  fuselage  and  the  rotors 
must  be  driven  in  order  to  achieve  a  trim  condition  in  either 
a  push-over,  a  pull-up,  or  a  banked  turn. 

36.  PARA.  This  subroutine  is  for  output  only.  It  prints  the 
trim  parameter  summary  which  comes  at  the  end  of  the  trim. 

37.  PCG.  As  the  name  implies  this  subroutine  is  the  prop- 
rotor  collective  governor. 

38.  PDZ1,  PDZ.  The  inputs  of  this  subroutine  are  a  trim 
partial  derivative  matrix,  that  is  the  Jacobian,  and  the  type 
of  helicopter  or  rotorcraft  being  flown.  This  subroutine  then 
changes  the  partial  derivative  matrix  to  conditions  which  are 
known  to  hold.  Essentially,  this  is  a  crude  attempt  to  filter 
numerical  "noise"  in  the  matrix. 

39.  PPLOT.  This  is  the  printer  plot  routine  which  produces 
plots  of  time  histories  of  the  variables  calculated  during  a 
maneuver . 

40.  RATI.  Inputs  to  this  subroutine  are  the  corrections  to 
the  trim  variables  and  the  maximum  allowable  correction.  The 
subroutine  then  checks  to  see  that  no  correction  applied  ex¬ 
ceeds  the  maximum  and  makes  proper  dimensional  adjustments  to 
the  corrections  and  then  makes  the  corrections. 

41.  RATS.  Inputs  to  this  subroutine  are  the  three  components 
of  a  vector  in  one  coordinate  system  and  three  Euler  angles 
and  a  direction  number  of  the  Euler  angles.  The  output  is  the 
three  components  of  a  vector  in  the  other  coordinate  system. 

42.  READIN.  As  the  name  implies  this  subroutine  reads  in  the 
input  data  for  a  problem. 

43.  ROOA ,  R00B .  This  subroutine  is  used  in  the  determination 
of  the  eigenvalues  of  the  characteristic  coefficient  matrix  in 
the  stability  analysis  section  of  the  program. 

44.  ROTAN.  This  subroutine  may  be  considered  to  be  the  outer 
section  of  the  rotor  analysis. 

45.  SETS.  This  subroutine  saves  values  of  the  forces  and 
moments  calculated  l t  the  end  of  trim  or  at  the  start  of  the 
stability  analysis  section  for  later  use  in  comparison  and  in 
calculation  of  derivatives. 
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46.  SLTE.  In  the  part  of  the  stability  analysis  concerned 
with  the  response  of  the  rotorcraft  to  a  step  input  from  one 
of  the  controls,  this  subroutine  puts  the  derivative  with 
respect  to  the  appropriate  control  in  the  proper  position  in 
the  characteristic  coefficient  matrix. 

47.  SLTT.  After  the  roots  to  the  characteristic  coefficient 
matrix  have  been  calculated  as  a  result  of  a  modification  by 
SLTE,  this  subroutine  then  restores  the  characteristic  coef¬ 
ficient  matrix  to  its  original  form. 

48.  SOLVE.  This  subroutine  solves  systems  of  linear  equa- 
tions  by  Gaussian  elimination. 

49.  SRT.  This  subroutine  might  be  considered  as  the  driver 
for  tfie  finding  of  the  roots  of  the  characteristic  coefficient 
matrix  in  the  stability  analysis  section. 

50.  STAB.  This  subroutine  is  the  primary  subroutine  in  the 
stability  analysis  section  and  it  generates  or  it  does  the 
calling  for  such  quantities  as  the  Jacobian,  the  rate  deri¬ 
vatives,  and  the  subroutines  wh*«*h  then  do  the  lateral  and 
longitudinal  modes  analysis. 

51.  START.  The  function  of  this  subroutine  is  to  change  units 
of  the  input  arrays  and  set  them  equal  to  mnemonics. 

52.  SWAS1 ,  SWAS .  This  subroutine  performs  the  function  of 
linking  the  control  to  the  swashplates  with  the  appropriate 
linkage  factors  and  phase  factors. 

53.  TABINT.  As  the  name  implies,  this  subroutine  does  a 
table  interpolation  for  Cl  or  Cp  in  the  rotor  analysis. 

54.  TILT1,  TILT.  HSAF,  TFFA.  This  subroutine  handles  CG 
shift  for  several  different  manners  of  shifting  CG.  The  pri¬ 
mary  function  is  in  a  mast  tilt  maneuver.  It  provides  not 
only  for  CG  shift  but  also  for  changes  in  control  phasing  as 
a  function  of  the  mast  tilt  angle.  Secondary  entries  handle 
CG  shift  with  folding  of  a  rotor  either  when  it  is  being 
folded  aft  after  being  tilted  forward  and  stopped  or  being 
folded  horizontally  after  a  stop. 

55.  TINIT.  This  subroutine  should  be  considered  as  a  subsi¬ 
diary- oT^ub  routine  MNEM. 

TRIM.  As  the  name  implies,  this  subroutine  is  the  pri¬ 
mary  one  of  the  section  of  the  program  for  finding  the  stable 
flight  condition. 
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57.  TURN.  This  subroutine  handles  a  banked  turn.  Secondarily, 
it  handles  push-overs  or  pull-ups.  It  does  so  by  checking 
input  data,  picking  up  proper  inputs,  and  doing  the  approrpiate 
initialization  to  get  started  finding  a  stable  flight  condition. 

58.  VARI.  Produced  by  this  subroutine  are  the  effects  of  the 
disturbances  during  a  time  variant  maneuver.  The  inputs  to 
this  subroutine  are  the  user  supplied  forcing  functions  and 
the  results  produced  from  those  are  the  output  of  this  sub¬ 
routine. 

59.  VI ND.  This  subroutine  calculates  the  induced  velocity 
of  a  rotor. 

60.  WAGlt  WAG.  A  study  of  aerodynamics  as  started  by  Wagner 
and  Ktissner  and  developed  by  Buettiker  for  helicopter  applica¬ 
tions  are  handled  in  this  subroutine. 

61.  WRFM.  This  is  an  output  subroutine  which  writes  out  the 
rotor  f:orce  and  moment  summary  in  shaft  reference  and  the 
fuselage  reference  force  and  moment  summary. 

62.  WR0T1,  WROT.  This  is  another  output  subroutine  which 
produces  the  heading  for  the  printout  of  the  input  data,  the 
trim  page,  and  the  printer  plots. 

63.  WRVP1,  WRVP.  This  is  still  another  output  subroutine 
which  produces  the  printouts  of  the  partial  derivative  matrices 
calculated  and  the  independent  variables  used  in  the  calcula¬ 
tion  of  those  derivatives. 

64.  YFIX.  This  subroutine  takes  the  aerodynamic  inputs, 
initializes  and  changes  the  dimensions  on  them  and  calculates 
constants  for  subroutine  CLGD. 

G.  ASSEMBLY  LANGUAGE  SUBPROGRAMS 

* 

Besides  the  usual  group  of  software  routines  furnished  by 
the  computer  manufacturer  and  used  by  numerous  programs,  ASAJ01 
uses  three  locally  written  general  purpose  subprograms.  Since 
they  are  even  more  hardware  dependant  than  the  FORTRAN  sub¬ 
routines,  they  are  included  here  only  to  give  a  brief  descrip¬ 
tion  of  how  they  are  used  by  ASAJ01. 

The  first  subroutine,  ABDUMP,  produces  a  dump  and  an  abnormal 
termination  of  job  when  it  is  called.  This  routine  is  called 
by  subroutine  G81  only. 

Subroutine  DATE  has  three  entries.  They  are  DATE,  SETIME, 
and  TIMEX.  The  first  entry,  DATE,  returns,  as  an  argument  in 
the  calling  sequence,  the  current  date;  that  is,  the  date  on 
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which  the  call  is  executed,  in  eight  characters  of  alpha.  The 
second  entry  SETIME  has  an  input  only.  This  initializes  a 
timer  for  later  use  by  the  third  entry  TIMEX  which  has  three 
arguments  in  the  calling  sequence.  The  first  argument  is  the 
amount  of  time  used  since  the  beginning  of  the  job  step.  The 
second  argument  is  the  amount  of  time  that  has  elapsed  since 
the  last  call  to  TIMEX.  The  third  entry  in  the  calling  se¬ 
quence  has  as  its  value  the  time  left;  that  is,  the  number 
which  was  input  at  entry  SETIME  minus  the  first  argument  in 
TIMEX. 

Function  DOTX  is  the  third  subprogram.  It  is  basically  a 
vector  dot  product.  The  first  input  argument  is  the  first 
element  of  the  first  vector.  The  second  argument  is  the 
spacing  between  consecutive  elements  of  the  first  argument 
which  are  to  be  used  in  the  dot  product.  The  third  argument 
is  the  first  element  of  the  second  vector  to  be  used  in  the 
dot  product.  The  fourth  argument  is  the  spacing  between  ele¬ 
ments  of  the  third  argument.  The  fifth  argument  is  how  many 
elements  are  in  the  dot  product.  The  effect  of  the  second  and 
fourth  arguments  is  to  make  the  routine  general  enough  that 
tensors  of  any  order  may  be  used  as  the  first  and  third  argu¬ 
ments.  The  major  purpose  of  the  function  is  to  accomplish 
double  precision  accumulation  of  products  of  single  precision 
vectors  in  minimum  time. 
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SECTION  III 


DETAILED  PROGRAMMING  AIDS 

A.  CONTROL  SECTION  CROSS-REFERENCE 

The  information  contained  in  Table  I  is  necessary  and  suffi¬ 
cient  for  the  construction  of  the  overlay  scheme  for  ASAJ01. 
The  first  column  contains  the  names  of  the  subroutines  in 
alphabetical  order,  except  for  the  main  program,  C8I,  which 
is  first.  The  second  column,  length,  contains  the  size,  in 
bytes  in  hexadecimal  number  base,  of  the  compiled  or  assembled 
subprogram.  The  FORTRAN  subroutines  were  compiled  on  the  0/S 
360  FORTRAN  IV  (H)  Compiler  with  0PT=2.  The  third  column 
contains  several  operations  and  the  fourth  column,  in  the  same 
and  following  lines,  if  any,  contains  the  names  of  the  sub¬ 
routines  associated  with  that  operation.  Subroutine  SLTE  is 
a  good  example.  The  calling  chain  which  contains  SLTE  is: 

C81  calls  STAB,  STAB  calls  LAMODE  or  LMODE,  LAMODE  or  UiODE 
calls  MODE,  MODE  calls  SLTE,  SLTE  calls  SRT,  and  SRT  calls 
DET  or  ROOA.  With  this  sequence  of  calls  in  mind,  the  opera¬ 
tion  "Called  By"  refers  to  MODE;  "Calls"  refers  to  SRT;  "IS 
Used  By"  refers  to  C81,  LAMODE,  LMODE,  and  STAB;  "Uses"  re¬ 
fers  to  DET  and  ROOA. 

It  should  be  noted  that,  for  subroutine  AJACOB,  there  is 
the  peculiarity  that  subroutine  ITRIM  appears  for  both 
"Called  By,"  and  "Is  Used  By.”  This  means  that  subroutine 
AJACOB  is  called  by  ITRIM  which  also  calls  JACOBI  which 
then  calls  AJACOB. 

B.  DEFINITION  OF  VARIABLES  IN  COMMON 

Appendix  A,  which  is  a  dictionary  of  the  variables  in  common, 
is  for  use  in  conjunction  with  Appendices  B  through  F.  In 
the  format  given,  the  variables  are  first  sorted  by  length, 
one-letter  variables  first,  two-letter  next  and  so  on.  With¬ 
in  a  group  of  equal  length,  the  variables  are  then  sorted 
into  alphabetical  order.  Since  it  is  possible  to  have  a  num¬ 
ber  in  a  variable  hame,  numbers  follow  the  letter  Z. 

Note  that  in  some  places  the  variable  definition  begins  with 
a  number  in  parentheses  or  a  group  of  numbers  separated  by 
commas,  all  within  parentheses.  This  means  that  the  variable 
is  an  array  and  its  size  is  given.  Any  array  that  has  a 
subscript  with  a  maximum  value  of  "2"  is  a  rotor  variable. 

The  variable  with  the  subscript  one,  for  example  B(l),  refers 
to  the  first  rotor,  and  the  variable  with  the  subscript  two, 
for  example  B(2),  refers  to  the  second  rotor. 
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Sometimes,  one  of  these  variables,  which  is  dimensioned  two, 
is  defined  by  two  more  variables.  Again,  B  is  a  good  example. 
Variables  are  usually  easily  recognizable  in  the  cases  where 
one  variable  is  defined  in  terms  of  another.  It  is  always 
easy  to  check  if  some  set  of  letters  or  a  word  is  a  variable 
by  referring  to  the  proper  place  in  Appendix  A.  Local  vari¬ 
ables  are  not  defined  because  it  is  assumed  that  a  local 
variable  may  have  its  meaning  deduced  from  how  its  value  is 
calculated . 

C.  CROSS-REFERENCE  OF  VARIABLES  IN  COMMON 

ASAJ01  is  a  program  with  a  large  number  of  subroutines  and  a 
large  number  of  variables.  The  nature  and  order  of  the  com¬ 
putations  in  this  program  are,  in  general,  such  that  they  pre¬ 
vent  ready  modularization  below  the  level  exhibited  in  Fig¬ 
ure  1.  These  characteristics  of  ASAJ01  make  cross-referenc¬ 
ing  of  its  variables  necessary.  The  contents  of  Appendices 
B  through  E  are  designed  to  supplement  a  compiler  which  has 
a  cross-reference  option.  Such  a  compiler  provides  the  nec¬ 
essary  information  about  the  location  of  the  usage  of  varia¬ 
bles  within  a  subroutine,  while  the  appendices  provide  analo¬ 
gous  in ter-sub routine  information.  Appendix  B  is  a  digest  of 
information  extracted  from  the  compiler. 

Appearing  at  the  top  of  each  page  of  Appendix  B  are  column 
headings  of  subroutine  names.  Immediately  below  the  subroutine 
names  and  in  the  left  column  appear  the  names  of  the  labeled 
Commons.  Next  are  all  of  the  variables  arranged  by  the  same 
scheme  used  in  Appendix  A.  The  Common  which  contains  that 
variable  is  in  the  next  to  the  last  column  on  the  right  and 
a  sequence  number  is  given  in  the  right  column.  An  "X"  in 
the  middle  of  a  line  denotes  that  the  variable  whose  name 
appears  in  the  left  column  on  that  line  is  used  in  that  sub¬ 
routine.  Variables  which  are  in  a  subroutine  only  because 
the  Common  that  they  are  in  is  in  the  subroutine  are  not 
noted.  Only  those  variables  which  are  used  in  the  subroutine 
are  entered  in  the  tables. 

As  an  example  of  reading  and  using  Appendix  B,  find  the  line 
for  the  variable  AP  in  the  left  column.  Across  on  that  line 
is  an  "X"  under  the  column  headed  by  "MNEM."  This  means  that 
the  variable  AP  is  used  in  an  equation  or  calling  sequence  in 
subroutine  MNEM.  Similarly  noted  is  the  usage  of  AP  in  sub¬ 
routines  ANAL  and  INIT.  The  next  to  last  column  on  the  right 
contains  the  name  of  the  labeled  common,  MANAL,  which  con¬ 
tains  AP.  The  line  for  MANAL  indicates  that  AP  is  available 
for  use  in  subroutine  START  but  not  available  in  subroutine 
READIN.  Since  this  latter  information  is  easily  accessible 
in  the  compiler  cross-reference,  no  particular  effort  was 
made  to  develop  a  cross-reference  to  enhance  it. 
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Note  that  some  variables  are  preceded  by  an  asterisk.  An 
example  is  B.  Referring  to  Appendix  A,  the  variable  B  is 
defined  as  two  other  variables,  EM  and  BTR.  In  Appendix  B, 
entries  are  made  for  both  BM  and  BTR  in  all  the  subroutines 
for  which  there  are  entries  for  B. 

This  means  that  in  the  subroutines  which  have  an  entry  for 
B,  the  variables  BM  and  B1R  are  replaced  in  the  Common  by  B. 

The  most  common  uses  of  Appendix  B  are  checking  the  usage 
of  a  variable  during  program  modification  and  debugging. 

Appendix  C  is  a  list  of  variables  and  Commons  appearing  in  a 
subroutine.  The  subroutine  name  heads  the  list,  followed  by 
the  names  of  the  labeled  Commons  appearing  in  this  subroutine, 
followed  by  the  names  of  the  variables  used  in  the  same  order 
as  they  appear  in  the  left  column  of  Appendix  B.  The  sub¬ 
routines  are  listed  in  order  of  appearance  in  the  page  head¬ 
ings  of  Appendix  B  reading  from  left  to  right.  After  the  sub¬ 
routine  listings  come  similar  listings  for  each  of  the  Com¬ 
mons.  That  is  a  Common  name  followed  by  the  names  of  the 
variables  which  are  in  that  Common.  Again  the  order  is  the 
same  as  in  the  left  column  of  Appendix  B.  The  order  given 
here  is  not  necessarily  the  same  as  the  order  that  the  vari¬ 
ables  appear  in  the  FORTRAN  listing  in  Appendix  F. 

One  page  of  Appendix  C  is  derived  from  Appendix  B  by  selecting 
a  column,  printing  the  subroutine  name,  heading  that  column, 
and  then  searching  down  the  column  for  an  "X."  When  an  "X" 
is  encountered  on  some  line,  print  the  variable  name  that  is 
on  that  line  in  the  left  column. 

Appendix  C  is  primarily  used  to  check  the  contents  of  Appen¬ 
dix  B  with  the  compiler  and  thus  assure  the  accuracy  of 
Appendix  B. 

Appendix  D  is  Appendix  B  grouped  by  Common  and  is  used  to  de¬ 
cide  whether  to  put  a  Common  in  a  subroutine  or  to  put  the 
needed  variables  in  the  calling  sequence.  This  decision  is 
made  after  considering  the  number  of  variables  needed,  the 
frequency  of  changing  the  Common  and  thus  recompiling  the 
subroutine. 

Appendix  G  is  derived  from  Appendix  D  by  combining  subroutines 
into  sections.  The  column  headings  of  Appendix  E  are  the 
names  of  the  subroutines  which  control  their  section.  The 
first  section,  C81,  contains  only  subroutine  C81.  The  second 
section,  START,  contains  subroutines  START  through  VIND  (read¬ 
ing  across  the  headings  of  Appendix  D)  and  TILT  and  IVAR; 
section  ROTAN  contains  subroutines  VIND  through  DOROT;  sec¬ 
tion  ANAL  contains  subroutines  ANAL  through  SWAS;  section 

13 


♦ 


MANU  contains  subroutines  MANU  through  WRFM ;  section  STAB 
contains  subroutines  WRFM  through  WRVP;  section  TRIM  contains 
subroutines  JACOBI  through  IVAR;  section  PPLOT  contains  sub¬ 
routines  PPLOT  through  CURVET. 

Appendix  E  is  used  to  group  the  variables  for  the  labeled 
Commons . 

D.  FORTRAN  LISTING 

The  FORTRAN  subroutines  are  listed  in  Appendix  F  in  alphabeti¬ 
cal  order  except  for  the  main  program,  C8L,  which  is  first. 
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Figure  1.  Flow  Chart  of  Program  Structure 
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Figure  4.  Flow  Chart  of  Maneuver 


TABLE  I.  CONTROL  SECTION  CROSS-REFERENCE 


Name 

Length 

Operation 

Cross-Reference 

C8I 

COO 

Calls 

ABDUMP 

CURVET 

DATE 

MANU 

PPLOT 

WR0T1 

STAB 

START 

TRIM 

Uses 

AJACOB 

ANAL 

CATS 

CLCD 

COMSOL 

CONI 

C0N2 

C81L 

DAMPER 

DATE 

DET 

DISK 

DOGS 

DOROT 

DOTX 

ELEC 

GUST 

INIT 

INRO 

ITRIM 

I  TROT 

IVAR 

JACOBI 

LAMODE 

LMODE 

MATRIX 

MICE 

MNEM 

MODE 

NDSLOT 

NOPSIO 

OFFTRM 

PARA 

PCG 

PDZ1 

RATI 

RATS 

READIN 

ROOA 

ROTAN 

SETE 

SLTE 

SLTT 

SOLVE 

SRT 

SWAS1 

TABINT 

TILT1 

TINIT 

TURN 

VARI 

VIND 

WAGl 

YFIX 

WRFM 

WROT1 

WRVP1 

ABDUMP 

20 

Called  By 

C8L 

AJACOB 

390 

Called  By 

I  TRIM 

JACOBI 

STAB 

Is  Used  By 

C81 

I  TRIM 

STAB 

TRIM 

Calls 

ANAL 

OFFTRM 

RATS 

SWAS1 

WRFM 

WRVP1 

Uses 

CATS 

CLCD 

DISK 

DOGS 

DOROT 

DOTX 

ITROT 

MATRIX 

MICE 

RATS 

ROTAN 

TABINT 

VI ND 

WAGl 

ANAL 

1578 

Called  By 

AJACOB 

MANU 

STAB 

Is  Used  By 

C81 

TRIM 

I  TRIM 

JACOBI 

STAB 

Calls 

CLCD 

DOGS 

MICE 

RATS 

ROTAN 

WAGl 

Uses 

CATS 

CLCD 

DISK 

DOGS 

DOROT 

DOTX 

ITROT 

MATRIX 

MICE 

WAGl 

RATS 

TABINT 

VIND 

TABLE 

I.  Continued 

Name 

Length 

Operation 

Cross- 

Reference 

CATS 

5D8 

Called  By 

OFFTRM 

ROTAN 

Is  Used  By 

C81 

JACOBI 

AJACOB 

MANU 

ANAL  ITRIM 

STAB  TRIM 

Calls 

MATRIX 

CL  CD 

CD8 

Called  By 

ANAL 

DOROT 

MNEM 

Is  Used  By 

C81 

ITROT 

STAB 

AJACOB 

JACOBI 

START 

ANAL  ITRIM 
MANU  ROTAN 
TRIM 

Calls 

MICE 

TABINT 

OOMSOL 

738 

Called  By 

LAMODE 

LMODE 

Is  Used  By 

C81 

STAB 

CONI 

488 

Called  By 

START 

Is  Used  By 

C81 

CON  2 

2E8 

Called  By 

MNEM 

Is  Used  By 

C8L 

START 

CURVET 

4EB8 

Called  By 

C81 

Calls 

DATE 

WROT1 

Uses 

DATE 

C8IL 

8F0 

Called  By 

PPLOT 

Is  Used  By 

C81 

Calls 

DATE 

DAMPER 

138 

Called  By 

IT  RIM 

TRIM 

Is  Used  By 

C81 

TRIM 

TRIM 


TABLE  I.  Continued 

Name 

Le ngth 

Operation 

Cross 

-Refe re nee 

DATE 

IFO 

Called  By 

C81 

ITRIM 

WROT1 

CURVET 

PARA 

C81L 

PPLOT 

I  NIT 
STAB 

Is  Used  By 

C81 

PARA 

CURVET 

PPLOT 

ITRIM 

START 

MANU 

TRIM 

DET 

798 

Called  By 

SRT 

Is  Used  By 

C81 

SLTE 

LAMODE 

STAB 

LMODE 

MODE 

DISK 

390 

Called  By 

&OTAN 

Is  Used  By 

C81 

JACOBI 

AJACOB 

MANU 

ANAL 

STAB 

ITRIM 

TRIM 

DOGS 

180 

Called  By 

ANAL 

MNEM 

ROTAN 

VARI 

Is  Used  By 

C81 

JACOBI 

TRIM 

AJACOB 

MANU 

ANAL 

STAB 

ITRIM 

START 

DO  ROT 

IBE8 

Called  By 

ITROT 

Is  Used  By 

C81 

JACOBI 

TRIM 

AJACOB 

MANU 

ANAL 

ROTAN 

ITRIM 

STAB 

Calls 

CLCD 

DOTX 

RATS 

Uses 

MATRIX 

MICE 

TABINT 

DOTX 

58 

Called  By 

DO  ROT 

Is  Used  By 

C81 

ITROT 

STAB 

AJACOB 

JACOBI 

TRIM 

ANAL 

MANU 

ITRIM 

ROTAN 

ELEC 

250 

Called  By 

LAMODE 

LMODE 

MODE 

Is  Used  By 

C81 

LAMODE 

LMODE 

STAB 

;> 


TABLE  I 

.  Continued 

Name 

Length 

Operation 

Cross- 

-Reference 

GUST 

7E0 

UaLJLed  By 

Is  Used  By 
Calls 

Uses 

VARI - 

C81 

RATS 

MATRIX 

MANU 

INIT 

1870 

Called  By 

MANU 

Is  Used  By 

C81 

Calls 

DATE 

WRFM 

INRO 

B38 

Called  By 

START 

Is  Used  By 

C81 

Calls 

NOPSIO 

ITRIM 

670 

Called  By 

TRIM 

Is  Used  By 

C81 

Calls 

AJACOB 

PARA 

SOLVE 

DAMPER 

PDZ1 

WRVPl 

DATE 

RATI 

JACOBI 

RATS 

Uses 

AJACOB 

DATE 

DOTX 

OFFTRM 

TABINT 

WR0T1 

ANAL 

DISK 

ITROT 

RATS 

VIND 

WRVP1 

CATS 

DOGS 

MATRIX 

ROTAN 

WAG1 

CLCD 

DO  ROT 
MICE 
SWAS1 
WRFM 

ITROT 

D40 

Called  By 

ROTAN 

Is  Used  By 

C81 

JACOBI 

AJACOB 

MANU 

ANAL 

STAB 

ITRIM 

TRIM 

Calls 

DO  ROT 

VIND 

Uses 

CL  CD 
RATS 

DOTX 

TABINT 

MATRIX 

MICE 

IVAR 

B78 

Called  By 

MNEM 

TRIM 

Is  Used  By 

C81 

START 

22 


TABLE  I.  Continued 


Name 

Length 

Operation 

Cross 

-Reference 

JACOBI 

258 

Called  By 

ITRIM 

STAB 

Is  Used  By 

C81 

TRIM 

Calls 

AJACOB 

Uses 

ANAL 

DOGS 

MATRIX 

ROTAN 

WAG1 

CATS 

DOROT 

MICE 

SWAS1 

WRFM 

CLCD 

DOTX 

OFFTRM 

TABINT 

WRVP1 

DISK 

I  TROT 

RATS 

VIND 

lamode 

B40 

Called  By 

STAB 

Is  Used  By 

C81 

Calls 

COMSOL 

SRT 

ELEC 

MODE 

NDSLOT 

Uses 

DET 

SLTT 

ELEC 

SRT 

ROOA 

SLTE 

DIODE 

BBO 

Called  By 

STAB 

Is  Used  By 

C81 

Calls 

COMSOL 

SRT 

ELEC 

MODE 

NDSLOT 

Uses 

DET 

SLTT 

ELEC 

SRT 

ROOA 

SLTE 

MANU 

1898 

Called  By 

C81 

Calls 

ANAL 

ROTAN 

INIT 

SWAS1 

PCG 

VARI 

RATS 

Uses 

CATS 

DOGS 

I  TROT 
ROTAN 

VI ND 

CLCD 

DOROT 

MATRIX 

SOLVE 

WAG1 

DATE 

DOTX 

MICE 

TABINT 

WRFM 

DISK 

GUST 

RATS 

TILT1 

) 


TABLE 

I.  Continued 

Name 

Length 

Operation 

Cross-Reference 

MATRIX 

2E0 

Called  By 

CATS 

RATS 

Is  Used  By 

C81 

AJACOB 

ANAL 

DOROT 

GUST 

I  TRIM 

ITROT 

JACOBI 

MANU 

MNEM 

OFFTRM 

ROTAN 

STAB 

START 

TRIM 

VARI 

MICE 

IC8 

Called  By 

ANAL 

CLCD 

MNEM 

Is  Used  By 

C81 

AJACOB 

ANAL 

DOROT 

I  TRIM 

ITROT 

JACOBI 

MANU 

MNEM 

TRIM 

ROTAN 

STAB 

START 

MNEM 

1740 

Called  By 

START 

Is  Used  By 

C81 

Calls 

CLCD 

CON  2 

DOGS 

IVAR 

MICE 

NOPSIO 

RATS 

SWAS1 

TILT1 

WAG1 

TINIT 

TURN 

VIND 

Uses 

MATRIX 

MICE 

TABINT 

MODE 

8F0 

Called  By 

LAMODE 

LMODE 

Is  Used  By 

C81 

STAB 

Calls 

ELEC 

SLTE 

SLTT 

Uses 

DET 

ROOA 

SRT 

NDSLOT 

340 

Called  By 

LAMODE 

LMODE 

Is  Used  By 

C81 

STAB 

NOPSIO 

328 

Called  By 

INRO 

MNEM 

STAB 

TRIM 

Is  Used  By 

C81 

START 

TABLE  I.  Continued 


Name 

Length 

Operation 

Cross- 

Reference 

OFFTRM 

3D0 

Called  By 

AJACOB 

Is  Used  By 

C81 

TRIM 

I  TRIM 

JACOBI 

STAB 

Calls 

CATS 

RATS 

Uses 

MATRIX 

PARA 

BC8 

Called  By 

I  TRIM 

Is  Used  By 

C81 

TRIM 

Calls 

DATE 

WRFM 

WROT1 

WRVP1 

Uses 

DATE 

PCG 

248 

Called  By 

MANU 

Is  Used  By 

C81 

PDZ1 

398 

Called  By 

I  TRIM 

TRIM 

Is  Used  By 

C81 

TRIM 

PPLOT 

E80 

Called  By 

C81 

Calls 

C81L 

DATE 

WROT1 

Uses 

DATE 

RATI 

2A8 

Called  By 

I  TRIM 

Is  Used  By 

C81 

TRIM 

RATS 

250 

Called  By 

AJACOB 

ANAL 

DOROT 

GUST 

I  TRIM 

MANU 

MNEM 

OFFTRM 

ROTAN 

STAB 

VARI 

Is  Used  By 

C81 

AJACOB 

ANAL 

ITRIM 

I  TROT 

JACOBI 

MANU 

ROTAN 

STAB 

START 

TRIM 

VARI 

Calls 

MATRIX 

TABLE  I .  Continued 


Name 

Length 

Operation 

Cross- 

Reference 

READIN 

6D8 

Called  By 

START 

Is  Used  By 

C81 

ROOA 

F68 

Called  By 

SRT 

Is  Used  By 

C81 

SLTE 

LAMODE 

STAB 

LMODE 

MODE 

ROTAN 

C80 

Called  By 

ANAL 

MANU 

Is  Used  By 

C81 

MANU 

AJACOB 

STAB 

I  TRIM 
TRIM 

JACOBI 

Calls 

CATS 

RATS 

DISK 

WAGI 

DOGS 

I  TROT 

Uses 

CLCD 

MICE 

DOROT 

RATS 

DOTX 

TABINT 

MATRIX 
VI ND 

SETE 

1F8 

Called  By 

STAB 

Is  Used  By 

C81 

SLTE 

1B0 

Called  By 

MODE 

Is  Used  By 

C81 

LAMODE 

LMODE 

STAB 

Calls 

SRT 

Uses 

DET 

ROOA 

SLTT 

1A0 

Called  By 

MODE 

Is  Used  By 

C81 

LAMODE 

LMODE 

STAB 

SOLVE 

408 

Called  By 

I  TRIM 

VARI 

Is  Used  By 

C81 

MANU 

TRIM 

SRT 

358 

Called  By 

LAMODE 

LMODE 

SLTE 

Is  Used  By 

C81 

STAB 

LAMODE 

LMOD5 

MODE 

Calls 

DET 

ROOA 

TABLE  I.  Continued 


Name 

Length 

Operation 

Cros 8 - 

■Reference 

STAB 

1498 

Called  By 

C81 

Calls 

AJACOB 

ANAL 

DATE 

JACOBI 

LAMODE 

LMODE 

NOPSIO 

RATS 

SETE 

SWASI 

WRFM 

WRVP1 

Use  8 

AJACOB 

ANAL 

CATS 

CLCD 

CGHSOL 

DET 

DISK 

DOGS 

DO  ROT 

DOTX 

ELEC 

ITROT 

MATRIX 

MICE 

MODE 

NDSLOT 

OFFTRM 

RATS 

ROOA 

ROTAN 

SLTE 

SLTT 

SRT 

SWASI 

TABINT 

WRVP1 

VIND 

WAG1 

WRFM 

START 

11D8 

Called  By 

C81 

Calls 

CONI 

INRO 

MNEM 

READIN 

WROT1 

WRVP1 

YFIX 

Uses 

CLCD 

CON2 

EATE 

DOGS 

IVAR 

MATRIX 

MICE 

NOPSIO 

RATS 

SVfeSl 

TABINT 

TILT1 

TINIT 

TURN 

VIND 

WAG1 

SWASI 

390 

Called  By 

AJACOB 

MANU 

MNEM 

STAB 

Is  Used  By 

C81 

ITRIM 

JACOBI 

STAB 

START 

TRIM 

TABINT 

5B8 

Called  By 

CLCD 

Is  Used  By 

C81 

AJACOB 

ANAL 

DOROT 

IT  RIM 

IT  ROT 

JACOBI 

MANU 

MNEM 

TRIM 

ROTAN 

STAB 

START 

TILT1 

8A0 

Called  By 

MNEM 

VARI 

Is  Used  By 

C81 

MANU 

START 

TINIT 

2  CO 

Called  By 

MNEM 

Is  Used  By 

C81 

START 

27 


TABLE 

I*  Continued 

Name 

Length 

Operation 

Cross 

-Reference 

TRIM 

6F8 

Called  By 

C81 

Calls 

DAMPER 

PDZ1 

ITRIM 

IVAR 

NOPSlt) 

Uses 

AJACOB 

DAMPER 

DO  ROT 

MATRIX 

PDZ1 

SOLVE 

WAGI 

ANAL 

DATE 

DOTX 

MICE 

RATI 

SWAS1 

WRFM 

CATS 

DISK 

ITROT 

OFFTRM 

RATS 

TABINT 

WROT1 

CL  CD 

DOGS 

JACOBI 

PARA 

ROTAN 

VIND 

WRVP1 

TURN 

4D8 

Called  By 

MNEM 

Is  Used  By 

C81 

START 

VARI 

I7F0 

Called  By 

MANU 

Is  Used  By 

C81 

Calls 

DOGS 

TILT1 

GUST 

RATS 

SOLVE 

Uses 

MATRIX 

RATS 

VIND 

3F8 

Called  By 

ITROT 

MNEM 

Is  Used  By 

C81 

JACOBI 

START 

AJACOB 

MANU 

TRIM 

ANAL 

ROTAN 

ITRIM 

STAB 

WAGI 

CI8 

Called  By 

ANAL 

MNEM 

ROTAN 

Is  Used  By 

C81 

JACOBI 

TRIM 

AJACOB 

MANU 

ANAL 

STAB 

ITRIM 

START 

WRFM 

288 

Called  By 

AJACOB 

IN  IT 

PARA 

STAB 

Is  Used  By 

C81 

STAB 

ITRIM 

TRIM 

JACOBI 

MANU 

28 


TABLE  I.  Continued 

Name 

Length 

Operation 

Cross- 

Reference 

WR0T1 

218 

Called  By 

C81 

START 

CURVET 

PARA 

PPLOT 

Is  Used  By 

C81 

ITRIM 

TRIM 

Call  8 

DATE 

WRVP1 

750 

Called  By 

AJACOB 

START 

ITRIM 

PARA 

STAB 

Is  Used  By 

C81 

TRIM 

ITRIM 

JACOBI 

STAB 

YFIX 

790 

Called  By 

START 

Is  Used  By 

C81 

29 
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